object frmmoduledeal: Tfrmmoduledeal
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  Caption = #27169#22359#31649#29702
  ClientHeight = 328
  ClientWidth = 550
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnShow = FormShow
  DesignSize = (
    550
    328)
  PixelsPerInch = 96
  TextHeight = 13
  object lbl1: TLabel
    Left = 16
    Top = 16
    Width = 60
    Height = 13
    Caption = #27169#22359#21517#31216#65306
  end
  object lbl2: TLabel
    Left = 16
    Top = 43
    Width = 48
    Height = 13
    Caption = #19978#19968#32423#65306
  end
  object lbl3: TLabel
    Left = 16
    Top = 65
    Width = 36
    Height = 13
    Caption = #25490#24207#65306
  end
  object lbl4: TLabel
    Left = 16
    Top = 92
    Width = 36
    Height = 13
    Caption = #36335#24452#65306
  end
  object lbl5: TLabel
    Left = 16
    Top = 119
    Width = 60
    Height = 13
    Caption = #25171#24320#26041#24335#65306
  end
  object lbl6: TLabel
    Left = 16
    Top = 146
    Width = 60
    Height = 13
    Caption = #26159#21542#21487#29992#65306
  end
  object lbl7: TLabel
    Left = 16
    Top = 173
    Width = 36
    Height = 13
    Caption = #22791#27880#65306
  end
  object dbedtmodulename: TDBEdit
    Left = 82
    Top = 13
    Width = 255
    Height = 21
    DataField = 'modulename'
    DataSource = DataModule1.dsmodule
    ImeMode = imOpen
    TabOrder = 0
  end
  object dbedtsortid: TDBEdit
    Left = 82
    Top = 62
    Width = 255
    Height = 21
    DataField = 'sortid'
    DataSource = DataModule1.dsmodule
    TabOrder = 1
  end
  object dbedturl: TDBEdit
    Left = 82
    Top = 89
    Width = 255
    Height = 21
    DataField = 'url'
    DataSource = DataModule1.dsmodule
    ImeMode = imClose
    TabOrder = 2
  end
  object dbtreepid: TdxDBLookupTreeView
    Left = 82
    Top = 40
    Width = 255
    Height = 21
    CanSelectParents = True
    ParentColor = False
    TabOrder = 3
    TabStop = True
    Text = 'dbtreepid'
    TreeViewColor = clWindow
    TreeViewCursor = crDefault
    TreeViewFont.Charset = DEFAULT_CHARSET
    TreeViewFont.Color = clWindowText
    TreeViewFont.Height = -11
    TreeViewFont.Name = 'Tahoma'
    TreeViewFont.Style = []
    TreeViewIndent = 19
    TreeViewReadOnly = True
    TreeViewShowButtons = True
    TreeViewShowHint = False
    TreeViewShowLines = True
    TreeViewShowRoot = True
    TreeViewSortType = stNone
    DisplayField = 'modulename'
    DividedChar = '.'
    ListSource = ds1
    KeyField = 'moduleid'
    ListField = 'modulename'
    Options = [trDBCanDelete, trDBConfirmDelete, trCanDBNavigate, trSmartRecordCopy, trCheckHasChildren]
    ParentField = 'parentid'
    RootValue = 0
    TextStyle = tvtsShort
    DataField = 'parentid'
    DataSource = DataModule1.dsmodule
  end
  object dbcbbtarget: TDBComboBox
    Left = 82
    Top = 116
    Width = 255
    Height = 21
    DataField = 'target'
    DataSource = DataModule1.dsmodule
    TabOrder = 4
  end
  object dbcbbvalid: TDBComboBox
    Left = 82
    Top = 143
    Width = 255
    Height = 21
    Style = csDropDownList
    DataField = 'valid'
    DataSource = DataModule1.dsmodule
    Items.Strings = (
      #21487#29992
      #19981#21487#29992)
    TabOrder = 5
  end
  object dbmmomemo: TDBMemo
    Left = 82
    Top = 170
    Width = 255
    Height = 111
    DataField = 'memo'
    DataSource = DataModule1.dsmodule
    TabOrder = 6
  end
  object btn1: TButton
    Left = 181
    Top = 294
    Width = 75
    Height = 26
    Anchors = [akLeft, akRight, akBottom]
    Caption = #20445#23384
    Default = True
    ModalResult = 1
    TabOrder = 7
    OnClick = btn1Click
  end
  object btn2: TButton
    Left = 262
    Top = 294
    Width = 75
    Height = 26
    Anchors = [akLeft, akRight, akBottom]
    Cancel = True
    Caption = #20851#38381
    TabOrder = 8
    OnClick = btn2Click
  end
  object lst1: TRzCheckList
    Left = 343
    Top = 8
    Width = 194
    Height = 273
    Items.Strings = (
      'ggg')
    Items.ItemEnabled = (
      True)
    Items.ItemState = (
      0)
    ItemHeight = 17
    TabOrder = 9
  end
  object ds1: TUniDataSource
    DataSet = uni1
    Left = 16
    Top = 216
  end
  object uni1: TUniTable
    TableName = 'tsys_module'
    Connection = DataModule1.uniconn
    Left = 48
    Top = 216
  end
  object unipopedom: TUniQuery
    Connection = DataModule1.uniconn
    SQL.Strings = (
      
        'select a.*,b.moduleid from tsys_popedom a left join tsys_module_' +
        'popedom b on a.functionkey=b.functionkey and b.moduleid=:modulei' +
        'd')
    Left = 48
    Top = 272
    ParamData = <
      item
        DataType = ftInteger
        Name = 'moduleid'
        ParamType = ptInput
      end>
  end
end
